Cooking: WIP Cauliflower Wings Recipe

[clinton/website/site/unknownlamer.org.git] / Metaobject Protocols.html

diff --git a/Metaobject Protocols.html b/Metaobject Protocols.html
index ef27539..a3c6f96 100644 (file)
--- a/Metaobject Protocols.html
+++ b/Metaobject Protocols.html
@@ -7,7 +7,9 @@
     <meta name="generator" content="muse.el" />
     <meta http-equiv="Content-Type"
           content="text/html; charset=utf-8" />
-    <link href="http://feeds.unknownlamer.org/rss/site-updates" 
+    <meta name="viewport"
+         content="width=device-width, initial-scale=1.0" />
+    <link href="https://feeds.unknownlamer.org/rss/site-updates" 
           rel="alternate" type="application/rss+xml" title="Updates Feed" />
 
 <link rel="stylesheet" href="default.css" />
@@ -196,7 +198,8 @@
 </div>
 
 
-<!-- Page published by Emacs Muse begins here --><p>In Fall of 2006 I did a small project on Metaobject Protocols for my
+<!-- Page published by Emacs Muse begins here -->
+<p>In Fall of 2006 I did a small project on Metaobject Protocols for my
 CS 331 class. Here lie my notes which may perhaps be useful to
 others. I hope to expand them into something more useful over time.</p>
 
@@ -274,11 +277,11 @@ enable selective modification of individual facets with minimal code.</p>
   (options) ...)
 
 (<span class="emacs-face-keyword">defmethod</span> <span class="emacs-face-function-name">generic-name</span> ((parameter type) parameter ...)
-  <span class="emacs-face-string">"documentation string"</span>
+  <span class="emacs-face-doc">"documentation string"</span>
   body)
 
 (<span class="emacs-face-keyword">defgeneric</span> <span class="emacs-face-function-name">foo</span> (bar baz quux)
-  (<span class="emacs-face-builtin">:documentation</span> <span class="emacs-face-string">"Process the baz with the quux capacitor to make the
+  (<span class="emacs-face-builtin">:documentation</span> <span class="emacs-face-doc">"Process the baz with the quux capacitor to make the
 foo widget fly into the sky at warp speed"</span>))
 
 (<span class="emacs-face-keyword">defmethod</span> <span class="emacs-face-function-name">foo</span> ((bar example) baz (quux capacitor))
@@ -410,7 +413,7 @@ languages to expose a reflective MOP.</p>
 
 <pre class="src">
 (<span class="emacs-face-keyword">defgeneric</span> <span class="emacs-face-function-name">example-inspect</span> (instance)
-  (<span class="emacs-face-builtin">:documentation</span> <span class="emacs-face-string">"Simple object inspector using CLOS MOP"</span>))
+  (<span class="emacs-face-builtin">:documentation</span> <span class="emacs-face-doc">"Simple object inspector using CLOS MOP"</span>))
 
 (<span class="emacs-face-keyword">defmethod</span> <span class="emacs-face-function-name">example-inspect</span> ((instance t))
   (format t <span class="emacs-face-string">"Simple Object~% Value: ~S~%"</span> instance))
@@ -487,10 +490,10 @@ details to the program.</p>
 <span class="emacs-face-comment-delimiter">;;; </span><span class="emacs-face-comment">Metaclass
 </span>(<span class="emacs-face-keyword">defclass</span> <span class="emacs-face-type">observable</span> (standard-class)
   ()
-  (<span class="emacs-face-builtin">:documentation</span> <span class="emacs-face-string">"Metaclass for observable objects"</span>))
+  (<span class="emacs-face-builtin">:documentation</span> <span class="emacs-face-doc">"Metaclass for observable objects"</span>))
 
 (<span class="emacs-face-keyword">defmethod</span> <span class="emacs-face-function-name">compute-slots</span> ((class observable))
-  <span class="emacs-face-string">"Add a slot for storing observers to observable instances"</span>
+  <span class="emacs-face-doc">"Add a slot for storing observers to observable instances"</span>
   (cons (make-instance 'standard-effective-slot-definition
                        <span class="emacs-face-builtin">:name</span> 'observers
                        <span class="emacs-face-builtin">:initform</span> '(make-hash-table)
@@ -554,7 +557,7 @@ details to the program.</p>
                                      slot-name)
   (gethash slot-name (slot-value instance 'observers)))
 
-(<span class="emacs-face-keyword">defmethod</span> (<span class="emacs-face-function-name">setf slot-value-using-class)</span> <span class="emacs-face-builtin">:before</span> (new-value
+(<span class="emacs-face-keyword">defmethod</span> (<span class="emacs-face-function-name">setf slot-value-using-class</span>) <span class="emacs-face-builtin">:before</span> (new-value
                                                   (class observable)
                                                   instance
                                                   slot)
@@ -782,34 +785,35 @@ implementation as possible.</p>
 
   <p class="cke-buttons">
     <!-- validating badges, any browser, etc -->
-    <a href="http://validator.w3.org/check/referer"><img
-       src="http://www.w3.org/Icons/valid-xhtml10"
+    <a href="https://validator.w3.org/check/referer"><img
+       src="https://www.w3.org/Icons/valid-xhtml10"
        alt="Valid XHTML 1.0!" /></a>
     
-    <a href="http://www.anybrowser.org/campaign/"><img
+    <a href="https://www.anybrowser.org/campaign/"><img
        src="img/buttons/w3c_ab.png" alt="[ Viewable With Any Browser
        ]" /></a>
 
-    <a href="http://www.debian.org/"><img
+    <a href="https://www.debian.org/"><img
        src="img/buttons/debian.png" alt="[ Powered by Debian ]" /></a>
     
-    <a href="http://hcoop.net/">
+    <a href="https://hcoop.net/">
       <img src="img/buttons/hcoop.png" 
        alt="[ Hosted by HCoop]" />
     </a>
 
-    <a href="http://www.fsf.org/register_form?referrer=114">
+    <a href="https://www.fsf.org/register_form?referrer=114">
       <img src="img/buttons/fsf_member.png"
        alt="[ FSF Associate Member ]" />
     </a>
   </p>
 
-<p class="cke-footer">                         Ruled by the ebb of my oceans                         
-                        Slaves to the dusk and the dawn                        
-                         Your petri dish civilisations                        
-                             Are buried and born                              
+<p class="cke-footer">&lt;ascii_phil&gt; There once was a man named Bertold
+&lt;ascii_phil&gt; Who drank beer when the weather grew cold
+&lt;ascii_phil&gt; As he reached for his cup...
+&lt;ascii_phil&gt; "NEEEEVER GONNA GIVE YOU UP!!!"
+&lt;ascii_phil&gt; Oh, snap! You just got limerickrolled!
 </p>
 <p class="cke-timestamp">Last Modified:
-    January 30, 2009</p>
+    January 21, 2013</p>
   </body>
 </html>
\ No newline at end of file